|
AutoCAD VBA : Kreis löschen
Huebi am 24.06.2008 um 18:29 Uhr (0)
Hallo Jörg,zuerst mal zu der Online-Hilfe. Es gibt eine Hilfe für VBA von Microsoft (in der scheinst Du gelandet zu sein) und eine VBA Hilfe von Autodesk. Wenn Du vor einem typischen AutoCAD-Vba Befehl stehst (z.B. GetEntity) und dann F1 drückst, sollte die Autodesk-Hilfe aufgehen und die ist, wie ich finde, sehr ausführlich und umfangreich (zumindest für eine Anfänger wie mich).Dann zu Deinem Kreis-Problem. Ich verstehe nicht, warum Du den Kreis löschen und neu zeichnen möchtest. Warum verschiebst Du ihn ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel integration in AutoCAD
Huebi am 01.04.2005 um 07:56 Uhr (0)
Servus Dominik,Du schreibst in Deinem Beitrag von "Verlinkung". Verstehe ich Dich da richtig, daß Du mit den in Excel ermittelten Koordinaten und Größen Bauteile in AutoCAD generieren und plazieren möchtest (so wie Brischke es schon mal gefragt hat)? Das ist nicht weiter schwer, da Du mit VBA auf die Einträge in Deiner Excel-Liste zugreifen und in AutoCAD anhand dieser Werte Zeichnungselemente erzeugen kannst.Oder möchtest Du den Weg wieder zurück gehen können, so daß man in AutoCAD ein Bauteil anklicken k ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Einfachen VBA Programm hinter einem Icon hinterlegen
Huebi am 30.01.2004 um 08:13 Uhr (0)
Servus Feyza, mit dem gleichen Problem habe ich auch schon gekämpft. Mein Problem war, daß AutoCAD den angegebenen Pfad nicht übernehmen mochte. Ich habe es wie folgt gelöst: Ich habe ein Unterverzeichnis für meine VBA-Makros gemacht - in meinem Fall auf einem Netzwerklaufwerk, damit auch Kollegen darauf zugreifen können. In dieses Unterverzeichnis kommen alle dvb-Dateien. Diesen Pfad habe ich dann im AutoCAD unter Extras - Optionen - Dateien - Suchpfad für Supportdateien zusätzlich eingetragen, somit fä ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Geometrie einer Bemassung
Huebi am 17.01.2005 um 11:16 Uhr (0)
Servus zusammen, evtl. kann mir jemand bei meinem Problem helfen Ich bemaße Gebäudegrundrisse (die ich als Vermesser zuvor aufgemessen habe). Dazu habe ich mir einen Bemaßungsstil definiert, der einen benutzerdefinierten Pfeil hat (...also dieser übliche Schrägstrich) und ich unterdrücke die beiden Hilfslinien. Das funktioniert soweit recht gut und das Ergebnis entspricht - bis auf wenige Abstriche - dem, was ich von dieser Bemassung erwarte. Nun mein Problem: Wenn ich beide Hilfslinien unterdrücke, sehe ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Geometrie einer Bemassung
Huebi am 17.01.2005 um 16:25 Uhr (0)
Servus Nancy! Ich denke, Du hast schon erfasst, um was es mir geht. Ich möchte nur anzeigen lassen (zu einem fixen Zeitpunkt), wo die Bemaßungsbezugspunkte so liegen. Dummerweise benutze ich nur DimRotated, da die ja am universellsten zu benutzen sind. Das mit dem anzeigen stell ich mir so vor, daß ich ein VBA-Programm starte, dieses Programm dann den Dummy-Layer löscht und die Bezugspunkte reinmalt . Ob als kleine Kreise oder als AcadPoint - es geht ja nur darum, daß man in dem ganzen, komplexen Grundris ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Geometrie einer Bemassung
Huebi am 18.01.2005 um 14:56 Uhr (0)
Servus @ Alle hier also der Programmcode. Ich bin einen Umweg über eine DXF-Datei gegangen, da die Bezugspunkte hier offen (wenn auch in Ihrer Genauigkeit eingeschränkt) liegen. Ich hoffe, der Eine oder Andere kann was damit anfangen Sub Bemassungsmarkierung() Dim DummyLayer As AcadLayer Dim FileName As String Dim ActSSet As AcadSelectionSet Dim FilterType(0) As Integer Dim FilterData(0) As Variant Dim Code As Integer Dim CodeStr, Data As String Dim BemAktiv, BemWrite As Boolean Dim BezPkt(3) As Double ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Texteinfügen, Einfügeposition
Huebi am 24.02.2005 um 08:27 Uhr (0)
Servus Martin, soweit ich weiß, funktioniert es in VBA nicht, daß man Objekte an den Cursor hängt und dann einfügt. Hierzu gab es schon ein paar Beiträge bei denen es meist um das Einfügen von Blocks (am Cursor) ging (...kannst ja mal in der Suche nachsehen). Was allerdings geht, ist ein nicht gerade eleganter Workaround mit dem SendCommand - Befehl (siehe anhängender Programmcode). Ich erzeuge einen Text und verändere ihn (in diesem Fall die Farbe), um diesen Text im Anschluß in AutoCAD (mit SendCommand) ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : automatische Ermittlung der Rahmenabmaße
Huebi am 25.02.2005 um 07:54 Uhr (0)
Servus Marc, erstmal hallo und herzlich willkommen im Forum! Das was Du suchst - denke ich - ist die Methode GetBoundingBox , die die Maximalwerte eines AutoCAD Objektes ermittelt. Wenn man das auf einen Auswahlsatz anwendet (hier Alle Objekte im Layer Rahmen ), kann man sehr einfach die Extremwerte über alle Objekte ermitteln und damit natürlich auch die Gesamtgröße. Hier mal ein kleines Progrämmchen... Code: Sub GetBoundingBoxByLayer() Dim Min, Max, AllMin, AllMax As Variant Dim RahmenLayer As Strin ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Vorhandene Zeichnung Skalieren, Positionieren und anschließend Exceltabelle einfügen
Huebi am 28.02.2005 um 10:38 Uhr (0)
Servus CoXiDo, erstmal wilkommen im Forum! Ohne AutoCAD Kenntnisse wirst Du Dir sehr hart tun bei dem was Du vor hast, da VBA für AutoCAD natürlich an den Methoden und Funktionen in AutoCAD zusammenhängt. Zuerst versuche doch mal zu beschreiben, wie Du das, was Du machen möchtest, manuell in AuoCAD machen würdest. Es klingt so, als möchtest Du einen Ausschnittplot verkleinert auf ein festes Format bringen und dazu via OLE eine Excel-Tabelle einblenden. Das mit dem Einblenden von Excel-Tabellen wurde schon ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Vorhandene Zeichnung Skalieren, Positionieren und anschließend Exceltabelle einfügen
Huebi am 28.02.2005 um 14:11 Uhr (0)
Hallo CoXiDo, ich denke, zuerst brauchst Du die Maximalwerte (Ausdehnung) Deiner Zeichnung um sie skalieren zu können. Schau Dir dazu mal diesen Beitrag an: http://ww3.cad.de/foren/ubb/Forum259/HTML/000520.shtml Den Befehl _scale und _move machst Du am besten via SendCommand z.B. so (unter der Annahme, Deine Zeichungseinheit entspricht 1mm): Code: Dim AllMin, AllMax As Variant Die zuvor ermittelten Maximalwerte Dim XMinStr, YMinStr, ScaleFaktor As String Const SollHoehe = 146 ScaleFaktor = ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Vorhandene Zeichnung Skalieren, Positionieren und anschließend Exceltabelle einfügen
Huebi am 28.02.2005 um 17:04 Uhr (0)
Servus CoXiDo, Zitat: Also als erstes, ich programmiere ja mit VB6 und nicht mit dem vom Autocad mitgelierferten VBA. Daher kann ich solche Objekte wie ThisDrawing und die Methode SendCommand nicht benutzen bzw. finden. Du benutzt doch die Variable acadDoc die Du auch als AutoCAD-Document in Deinem VB6 Programm definierst. Nun nimm einfach den Namen ThisDrawing und ersetze es mit Deinem acadDoc und schon sollte es funktionieren. Hier mal ein Schnellschuß in VB6: Code: Private Sub Command1_Cl ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Vorhandene Zeichnung Skalieren, Positionieren und anschließend Exceltabelle einfügen
Huebi am 01.03.2005 um 14:24 Uhr (0)
Servus CoXiDo, Also zuerstmal: Mein Name is Huebi und nicht Hubi!!!!! *lach*, ich bitte um Beachtung. Zum zweiten gebe ich Dir den Rat das Programm erst in VBA für AutoCAD zu erstellen. Da hast Du den vollen Zugriff auf die (sehr umfangreiche und mit Beispielen gut dokumentierte) Hilfe. Wenn s läuft kannst Du s ja dann nach VB6 portieren. Beim übertragen nach VB6 mußt Du natürlich auch an die Verweise denken (aber das weißt Du ja sicher). Nun zu Deinem Code: Du öffnest eine AutoCAD Zeichnung namens AcDo ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Vorhandene Zeichnung Skalieren, Positionieren und anschließend Exceltabelle einfügen
Huebi am 01.03.2005 um 15:32 Uhr (0)
Menno Franjo! Gehst Du mal in Einzelschritten durch das Programm? Guckst Du Dir die Variablen im Überwachungsfenster an ob sie gefüllt werden? Hast Du in VB6 den Verweis auf AutoCAD gesetzt? Wann ist eine Variable leer und wann gefüllt? Funktioniert überhaupt das Starten von AutoCAD und das Öffnen der Datei? Hast Du den Code mal in VBA für AutoCAD angeguckt? Fragen über Fragen. Geht nicht gibt s nicht. Bei mir klappt s hervorragend. Wenn Du willst, daß man Dir hilft (und ich hab s Dir wirklich schon vor ...
|
| In das Form Autocad VBA wechseln |
